home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FishMarket 1.0
/
FishMarket v1.0.iso
/
fishies
/
051-075
/
disk_059
/
browser
/
change.c
< prev
next >
Wrap
C/C++ Source or Header
|
1992-05-06
|
644b
|
36 lines
/****** ChangeToString() Mark E. Schretlen 87-01-17
- converts a variable of type long
to a string suitable for Amiga Text() subroutines for
window output.
*******/
#include <math.h>
#include <string.h>
char *ChangeToString(x)
long x;
{
double fi;
int dummy,sign;
static char buffer[70] = "\0";
char *p;
sign = dummy = 0;
fi = (double)x;
strcpy(buffer,"");
p = &buffer[0];
/* Convert long to string with unix "fcvt" */
strins(p,fcvt(fi,0,&dummy,&sign));
if (sign) strins(p,"-"); /* insert neg. sign if necessary */
return(p);
}